###Exercicios Introduo ao R

##Basta mudar o diretrio?

getwd()
setwd("C:/Users/Edmundo/Documents/Meus Documentos/BIANCA/MESTRADO/Linguagem R")
getwd()
load(file="workspaceBiancaExemplo.RData")

##Um comando perigoso

objeto <- c(a,b,c)
objeto
rm(objeto)
objeto
#Erro: 'objeto' objeto no encontrado (porque foi excludo).
#Para no perder definitivamente todos os objetos apagados, basta recorrer ao cdigo salvo em um script  parte.

##Remoo com critrio
load(file="bichos.RData")
ls()
rm(list=ls(pattern="temp"))
ls()

##Classes de objetos
letters
LETTERS
letters <- factor(letters)
LETTERS <- factor(LETTERS)
factor(letters)
factor(LETTERS)

##Objetos de data
Sys.Date()
hoje <- Sys.Date()
class(hoje)
copa.70 <- "1970-07-21"
class(copa.70)
copa.70 <- as.Date(copa.70)
class(copa.70)
hoje - copa.70
hoje + 43